home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / dev / lang / amigatalk.lha / prelude / ACollection.p next >
Text File  |  2002-04-15  |  4KB  |  106 lines
  1. pTempVar <- <primitive 110 18 >
  2. <primitive 112 pTempVar 1  " withAll: " \
  3.   #( #[ 16r20 16r21 16rA3 16rB0 16r72 16r50 16r73 16r21 16rE1 16r04 16r09 \
  4.         16r22 16r23 16r51 16rC0 16rF1 16r73 16r24 16rD0 16rF3 16rB3 \
  5.         16rF2 16r22 16rF3 16rF5] \
  6.     #(  )) >
  7.  
  8. <primitive 112 pTempVar 2  " with:with:with:with: " \
  9.   #( #[ 16r20 16r54 16rB0 16r75 16r25 16r51 16r21 16rD0 16rF2 16r25 16r52 \
  10.         16r22 16rD0 16rF2 16r25 16r53 16r23 16rD0 16rF2 16r25 16r54 \
  11.         16r24 16rD0 16rF2 16r25 16rF3 16rF5] \
  12.     #(  )) >
  13.  
  14. <primitive 112 pTempVar 3  " with:with:with: " \
  15.   #( #[ 16r20 16r53 16rB0 16r74 16r24 16r51 16r21 16rD0 16rF2 16r24 16r52 \
  16.         16r22 16rD0 16rF2 16r24 16r53 16r23 16rD0 16rF2 16r24 16rF3 \
  17.         16rF5] \
  18.     #(  )) >
  19.  
  20. <primitive 112 pTempVar 4  " with:with: " \
  21.   #( #[ 16r20 16r52 16rB0 16r73 16r23 16r51 16r21 16rD0 16rF2 16r23 16r52 \
  22.         16r22 16rD0 16rF2 16r23 16rF3 16rF5] \
  23.     #(  )) >
  24.  
  25. <primitive 112 pTempVar 5  " with: " \
  26.   #( #[ 16r20 16r51 16rB0 16r72 16r22 16r51 16r21 16rD0 16rF2 16r22 16rF3 \
  27.         16rF5] \
  28.     #(  )) >
  29.  
  30. <primitive 112 pTempVar 6  " shallowCopy " \
  31.   #( #[ 16r20 16rA4 16r20 16rA3 16rB0 16r71 16r51 16r20 16rA3 16rB2 16rE1 \
  32.         16r02 16r07 16r21 16r22 16r20 16r22 16rB1 16rD0 16rF3 16rB3 \
  33.         16rF2 16r21 16rF3 16rF5] \
  34.     #(  )) >
  35.  
  36. <primitive 112 pTempVar 7  " padTo: " \
  37.   #( #[ 16r20 16rA3 16r21 16rC7 16rF7 16r0C 16r20 16r20 16rA4 16r21 16r20 \
  38.         16rA3 16rC1 16rB0 16r0B 16r12 16rF8 16r02 16rF2 16r20 16rF3 \
  39.         16rF5] \
  40.     #(  )) >
  41.  
  42. <primitive 112 pTempVar 8  " next " \
  43.   #( #[ 16r10 16r51 16rC0 16r60 16r10 16r20 16rA3 16rC8 16rF7 16r03 16r20 \
  44.         16r10 16rB1 16rF3 16rF5] \
  45.     #(  )) >
  46.  
  47. <primitive 112 pTempVar 9  " lastKey " \
  48.   #( #[ 16r20 16rA3 16rF3 16rF5] \
  49.     #(  )) >
  50.  
  51. <primitive 112 pTempVar 10  " firstKey " \
  52.   #( #[ 16r51 16rF3 16rF5] \
  53.     #(  )) >
  54.  
  55. <primitive 112 pTempVar 11  " first " \
  56.   #( #[ 16r51 16r60 16r10 16r20 16rA3 16rC8 16rF7 16r03 16r20 16r10 16rB1 \
  57.         16rF3 16rF5] \
  58.     #(  )) >
  59.  
  60. <primitive 112 pTempVar 12  " do: " \
  61.   #( #[ 16r51 16r20 16rA3 16rB2 16rE1 16r02 16r08 16r22 16r60 16r21 16r20 \
  62.         16r22 16rB1 16rB5 16rF3 16rB3 16rF2 16rF5] \
  63.     #(  )) >
  64.  
  65. <primitive 112 pTempVar 13  " deepCopy " \
  66.   #( #[ 16r20 16rA4 16r20 16rA3 16rB0 16r71 16r51 16r20 16rA3 16rB2 16rE1 \
  67.         16r02 16r09 16r21 16r22 16r20 16r22 16rB1 16r0A 16r15 16rD0 \
  68.         16rF3 16rB3 16rF2 16r21 16rF3 16rF5] \
  69.     #(  )) >
  70.  
  71. <primitive 112 pTempVar 14  " currentKey " \
  72.   #( #[ 16r10 16rF3 16rF5] \
  73.     #(  )) >
  74.  
  75. <primitive 112 pTempVar 15  " copyFrom:to: " \
  76.   #( #[ 16r22 16r21 16rC1 16r51 16rC0 16r73 16r20 16rA4 16r23 16rB0 16r74 \
  77.         16r24 16r51 16r23 16r20 16r21 16r84 16r00 16rF2 16r24 16rF3 \
  78.         16rF5] \
  79.     #( #replaceFrom:to:with:startingAt:  )) >
  80.  
  81. <primitive 112 pTempVar 16  " coerce: " \
  82.   #( #[ 16r20 16rA4 16r21 16rA3 16rB0 16r72 16r22 16r51 16r21 16rA3 16r21 \
  83.         16r83 16r00 16rF2 16r22 16rF3 16rF5] \
  84.     #( #replaceFrom:to:with:  )) >
  85.  
  86. <primitive 112 pTempVar 17  " at:ifAbsent: " \
  87.   #( #[ 16r21 16r50 16rC8 16rFB 16r04 16r21 16r20 16rA3 16rCC 16rF7 16r03 \
  88.         16r22 16rA5 16rF3 16rF2 16r20 16r21 16rB1 16rF3 16rF5] \
  89.     #(  )) >
  90.  
  91. <primitive 112 pTempVar 18  " = " \
  92.   #( #[ 16r20 16rA3 16r21 16rA3 16rCA 16rF7 16r02 16r5C 16rF3 16rF2 16r50 \
  93.         16r72 16r20 16rE1 16r03 16r0E 16r23 16r21 16r22 16r51 16rC0 \
  94.         16rF1 16r72 16rB1 16rCA 16rF7 16r02 16r5C 16rF4 16rF3 16rB3 \
  95.         16rF2 16r5B 16rF3 16rF5] \
  96.     #(  )) >
  97.  
  98. <primitive 98 #ArrayedCollection \
  99.   <primitive 97 #ArrayedCollection #SequenceableCollection #AmigaTalk:General/ArrayedCollection.st \
  100.    #(  #current ) \
  101.    #( #withAll: #with:with:with:with: #with:with:with: #with:with: #with:  \
  102.        #shallowCopy #padTo: #next #lastKey #firstKey #first #do: #deepCopy #currentKey  \
  103.        #copyFrom:to: #coerce: #at:ifAbsent: #=  ) \
  104.   pTempVar 6 7 > #ordinary >
  105.  
  106.